Top 10k strings from Digitiser (19xx)(-).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TZX] (TOSEC-v2007-01-01) /

Back to the directory listing

   5 /(yu-yl)+9
   5 /(xu-xl)+1
   1 yub=yub*165
   1 yu=(xu-xl)*165
   1 ylb=ylb*165
   1 y=(z$="n"):
   1 y=(y$="n"):
   1 xub=xub*253
   1 xlb=xlb+253
   1 DIGITISER 
   1 ;xub-xlb,0
   1 ;xlb-xub,0
   1 ;"Ink   = ";
   1 ;"Digitiser",,,"Enter coordinates of left bottoncorner"
   1 ,ylb-yub+1
   1 ,,"Right top corner    = ";xu;",";yu
   1 ,,"Left bottom corner = ";
   1 ,,"Is that OK (Y or N) ? "
   1 ,,"Enter a convenient number which is not in the range ";xl;" to ";xu;".":
   1 ,,"Enter X coordinate of right top corner"
   1 *(z$>"`"))
   1 *(y$="W")+3900
   1 *(y$="T")+3400
   1 *(y$="S")+2400
   1 *(y$="L")+400
   1 *(y$="I")+1400
   1 *(y$="H")+2900
   1 *(y$="D")+1900
   1 *(y$="C")+900
   1 *(y$="A")+4900
   1 '"Rebobine la cinta para VERIFICAR":
   1 "X  coordinates  Y"
   1 "Words ?";z$
   1 "Words - enter AT coords ";r;",";c
   1 "Touch up - enter coords ";x;",";y
   1 "This number will be used to     return the program to the MENU."
   1 "Save - enter name ";z$
   1 "Paper = ";
   1 "MENU - enter instruction ";z$
   1 "Load - enter name ";z$
   1 "Is that OK (Y or N) ?";y$
   1 "Enter new paper colour ";p
   1 "Enter new ink colour ";i
   1 "Draw - enter origin ";ox;",";oy
   1 "Draw - enter coord ";x;",";y
   1 "DIGITISER"
   1 "Colour - u.r. corner ";xub;",";yub
   1 "Colour - on or off (n or f)?";z$
   1 "Colour - on or off (n or f)?";y$
   1 "Colour - l.l. corner ";xlb;",";ylb
   1 "Colour - box OK (Y or N) ? ";z$
   1 "Border= ";
   1 "Attr - enter AT coords ";r;",";c